home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 12 / Cream of the Crop 12 (Part II) / Cream of the Crop 12 (Part II).iso / OS2 / FCHEK284.ZIP / test / args04.f < prev    next >
Encoding:
Text File  |  1994-11-06  |  141 b   |  9 lines
  1.       integer c(20,10)
  2.       data c /1/
  3.       call suba(c)
  4.       end
  5.       subroutine suba(c)
  6.       integer c(100)
  7.       print *,c
  8.       end
  9.